home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Word 17
/
The Word 17 (Disk 2 of 2).adf
/
Install.s
< prev
Wrap
Text File
|
1998-01-07
|
3KB
|
116 lines
; Harddrive Install for The Word 17...
Echo "*Ec"
Echo " This script will attempt to install issue 17 of The Word"
Echo " to your harddrive, do you wish to continue (y/n)?" NOLINE
Ask ""
If NOT WARN
Echo "Terminating Installation"
Skip FINISHED
Endif
Echo " "
Echo " Now you will be asked to select a destination for The"
Echo " Word, a directory (called 'Word_17') will be created and"
Echo " the magazine will be installed there, press return to"
Echo " continue..." NOLINE
Ask ""
Failat 21
Echo >Ram:TW.temp0 "Assign >Nil: TWTemp: " NOLINE
RequestFile >>Ram:TW.temp0 "" PATTERN "" TITLE "Hmmm" POSITIVE "Do it!" DRAWERSONLY NOICONS
Execute >Nil: Ram:TW.temp0
Delete >Nil: Ram:TW.temp0
;----------------------------------- Directory Assign Failed...
Assign >Nil: TWTemp: EXISTS
If WARN
Echo " FAILED! - Installation was unable to Find"
Echo " and Assign Requested Directory!"
Skip FINISHED
Endif
;------------------------------------ Create Destination Dirs...
Makedir TWTemp:Word_17
Makedir TWTemp:Word_17/Files
Makedir TWTemp:Word_17/Files/Setup
;------------------------------------ Create icons...
If EXISTS "ENVARC:Sys/def_drawer.info"
Copy "ENVARC:Sys/def_drawer.info" TWTemp:Word_17.info
Endif
;------------------------------------ Wait for Disk 1 in any drive
Assign >Nil: CRN-TW17a: EXISTS
If WARN
Echo "*n Waiting for disk 1" NOLINE
Lab DISK1
Assign >Nil: CRN-TW17a: EXISTS
If WARN
Wait 2
Echo "." NOLINE
Skip DISK1 BACK
Endif
Echo " "
Endif
;------------------------------------ Copy main files etc...
Wait 1
Echo "*n Accessing Disk 1*n"
Echo "Copying Main Executable..." NOLINE
Copy "CRN-TW17a:Word.exe#?" "TWTemp:Word_17/" QUIET
Echo "Done"
Echo "Copying the Articles..." NOLINE
Copy "CRN-TW17a:Files/#?" ALL "TWTemp:Word_17/Files/" QUIET
Echo "Done"
Echo "Copying the Fonts..." NOLINE
Copy "CRN-TW17a:Fonts/#?" ALL FONTS: QUIET
Echo "Done"
;------------------------------------ Wait for Disk 2 in any drive
Assign >Nil: CRN-TW17b: EXISTS
If WARN
Echo "*n Waiting for disk 2" NOLINE
Lab DISK2
Assign >Nil: CRN-TW17b: EXISTS
If WARN
Wait 2
Echo "." NOLINE
Skip DISK2 BACK
Endif
Echo " "
Endif
;------------------------------------ Copy main files etc...
Wait 1
Echo "*n Accessing Disk 2*n"
Echo "Copying the Articles..." NOLINE
Copy "CRN-TW17b:Files/#?" ALL "TWTemp:Word_17/Files/" QUIET
Echo "Done"
Echo "Copying the Article Tester..." NOLINE
Copy "CRN-TW17b:TWAT#?" "TWTemp:Word_17/" QUIET
Echo "Done"
Wait 2
CD TWTemp:
Echo "*n Your copy of The Word issue 17 is now installed in"
Echo " the directory " NOLINE
CD
Assign TWTemp: DISMOUNT
Echo "*n You do not need to make any assigns but we would"
Echo " Recommend a utility like FreakBoot or BootSelect"
Echo " is used to maximise your CHIP RAM."
Ask "*n Press Return..."
Lab FINISHED
EndCLI >Nil: